var
  a, b, d, c : Real;
begin
  a := 1 + 2;
  b := 1 / 2 + 3 - 4 - 5;
  c := --213;
  d := +312 - 123123 - 123 - --123 + +++---++++-21;
end.